-compile({i, "../../ect-0.2"}).

-module(tester).
-include("alpha.class.hrl").
-include("beta.class.hrl").
-include("gamma.class.hrl").


-define(EXPORT_PREFIX,"-methods([").
-define(EXPORT_SUFFIX,"]).").
-define(METHOD_ARITY,1).

-define(COMPILER_OPTIONS,[{i,"../../../ect-0.2"}]).

-include("../tester.hrl").


call_method(Object, Method) ->
    try
        {ok, Object:Method()}
    catch
        error:undef ->
            method_not_found
    end.

create_object(alpha) ->
    #alpha{};
create_object(beta) ->
    #beta{};
create_object(gamma) ->
    #gamma{}.

delete_object(_) ->
    ok.

switch_class(Class) ->
    my_delete_module(Class).



get_class_module(Class) ->
    Class.